home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 60.zip
/
BS1 part 60
/
Xcad d1.adf
/
hdinstall
< prev
next >
Wrap
AmigaDOS Script File
|
1992-06-22
|
5KB
|
126 lines
.key drive
IF "<drive>" EQ ""
ECHO "Type EXECUTE HDINSTALL [drive] e.g. EXECUTE HDINSTALL dh0:"
QUIT
ENDIF
ECHO "*nX-CAD 2000 - Installing on Hard Disc <drive>*n"
IF EXISTS <drive>XCAD2000
ECHO " X-CAD 2000 already installed! Please BACKUP/DELETE as required,"
ECHO " before continuing.*n"
QUIT
ELSE
MAKEDIR <drive>XCAD2000
COPY XCAD2000:empty.info TO ram:
RENAME ram:empty.info TO ram:XCAD2000.info
COPY ram:XCAD2000.info TO <drive>
delete ram:XCAD2000.info
;
ECHO "Copying X-CAD 2000 files to <drive>XCAD2000"
;
COPY XCAD2000:Xcad20003D TO <drive>XCAD2000
COPY XCAD2000:VN3D2000 TO <drive>XCAD2000
COPY XCAD2000:s/xcad#? TO s:
ASK "Are you using a United Kingdom (PAL) Amiga? (Y/N)"
IF warn
ECHO "UK machine - copying PAL icons"
COPY XCAD2000:2D_HiRes TO <drive>XCAD2000
COPY XCAD2000:2D_MedRes TO <drive>XCAD2000
COPY XCAD2000:2D_HiRes.info TO <drive>XCAD2000
COPY XCAD2000:2D_MedRes.info TO <drive>XCAD2000
COPY XCAD2000:XCAD2000 TO <drive>XCAD2000
COPY XCAD2000:3D_HI-16col TO <drive>XCAD2000
COPY XCAD2000:3D_MED-16col TO <drive>XCAD2000
COPY XCAD2000:3D_HI-8col TO <drive>XCAD2000
COPY XCAD2000:3D_MED-8col TO <drive>XCAD2000
COPY XCAD2000:3D_HI-16col.info TO <drive>XCAD2000
COPY XCAD2000:3D_MED-16col.info TO <drive>XCAD2000
COPY XCAD2000:3D_HI-8col.info TO <drive>XCAD2000
COPY XCAD2000:3D_MED-8col.info TO <drive>XCAD2000
ELSE
ECHO "USA machine - copying NTSC icons"
COPY XCAD2000:2D_HiRes-NTSC TO <drive>XCAD2000
COPY XCAD2000:2D_MedRes-NTSC TO <drive>XCAD2000
COPY XCAD2000:2D_HiRes-NTSC.info TO <drive>XCAD2000
COPY XCAD2000:2D_MedRes-NTSC.info TO <drive>XCAD2000
COPY XCAD2000:XCAD2000.NTSC TO <drive>XCAD2000
COPY XCAD2000:3D_HI-16col-NTSC TO <drive>XCAD2000
COPY XCAD2000:3D_MED-16col-NTSC TO <drive>XCAD2000
COPY XCAD2000:3D_HI-8col-NTSC TO <drive>XCAD2000
COPY XCAD2000:3D_MED-8col-NTSC TO <drive>XCAD2000
COPY XCAD2000:3D_HI-16col-NTSC.info TO <drive>XCAD2000
COPY XCAD2000:3D_MED-16col-NTSC.info TO <drive>XCAD2000
COPY XCAD2000:3D_HI-8col-NTSC.info TO <drive>XCAD2000
COPY XCAD2000:3D_MED-8col-NTSC.info TO <drive>XCAD2000
ENDIF
;
ASK "Are you using an A3000 machine? (Y/N)"
IF WARN
ECHO "Copying A3000 icon"
COPY XCAD2000:3D_HI-16col-A3000 TO <drive>XCAD2000
COPY XCAD2000:3D_HI-16col-A3000.info TO <drive>XCAD2000
ENDIF
;
COPY XCAD2000:handlers TO <drive>XCAD2000/handlers ALL
COPY XCAD2000:menus TO <drive>XCAD2000/menus ALL
MAKEDIR <drive>XCAD2000/drawings
MAKEDIR <drive>XCAD2000/symbols
;
ECHO "*nPlease insert disc 2 in any drive ..."
COPY XCAD2000-2: TO <drive>XCAD2000 ALL
ECHO "*nPlease insert disc 3 in any drive ..."
COPY XCAD2000-3: TO <drive>XCAD2000 ALL
ECHO "*nPlease insert disc 4 in any drive ..."
COPY XCAD2000-4:demo-drawings TO <drive>XCAD2000/drawings ALL
IF WARN
ECHO "Error occurred during installation."
QUIT
ENDIF
ENDIF
;
ASK "Add ASSIGNs to your STARTUPII / USER-STARTUP file? (Y/N) "
IF WARN
ECHO > ram:xq1 "ASSIGN MENUS: <drive>XCAD2000/MENUS"
ECHO > ram:xq2 "ASSIGN XCAD20003DPMODS: <drive>XCAD2000/PMODS"
ECHO > ram:xq3 "ASSIGN XCAD20003DHANDLERS: <drive>XCAD2000/HANDLERS"
ECHO > ram:xq4 "ASSIGN DRAWINGS: <drive>XCAD2000/DRAWINGS"
ECHO > ram:xq5 "ASSIGN XSDATA: <drive>XCAD2000/XSDATA"
ECHO > ram:xq6 "ASSIGN XSFONTS: <drive>XCAD2000/XSFONTS"
ECHO > ram:xq7 "ASSIGN XSLOVLY: <drive>XCAD2000/XSLOVLY"
ECHO > ram:xq8 "ASSIGN XSMODS: <drive>XCAD2000/XSMODS"
ECHO > ram:xq9 "ASSIGN XSPOVLY: <drive>XCAD2000/XSPOVLY"
ECHO > ram:xq10 "ASSIGN SYMBOLS: <drive>XCAD2000/SYMBOLS"
ECHO > ram:xq11 "ASSIGN XCAD20003D: <drive>XCAD2000"
;
VERSION >NIL: 36
IF WARN
;ECHO "Version 1.2 or 1.3*n"
IF EXISTS S:startupII
RENAME S:startupII TO S:startupII.pre2000
JOIN ram:xq1 ram:xq2 ram:xq3 ram:xq4 ram:xq5 ram:xq6 ram:xq7 ram:xq8 ram:xq9 ram:xq10 ram:xq11 S:startupII.pre2000 as S:startupII
DELETE ram:xq#?
ECHO "*nAssignments made - old file saved as STARTUPII.pre2000"
ELSE
ECHO"*nUnable to find S:startupII"
QUIT
ENDIF
ELSE
;ECHO "using 2.0 Kickstart!*n"
IF EXISTS S:User-startup
RENAME S:User-startup TO S:User-startup.pre2000
JOIN ram:xq1 ram:xq2 ram:xq3 ram:xq4 ram:xq5 ram:xq6 ram:xq7 ram:xq8 ram:xq9 ram:xq10 ram:xq11 S:User-startup.pre2000 as S:User-startup
DELETE ram:xq#?
ECHO "*nAssignments made - old file saved as User-startup.pre2000"
ELSE
ECHO"*nUnable to find S:User-startup"
QUIT
ENDIF
ENDIF
ELSE
ECHO "*nAll X-CAD 2000 files and icons copied onto hard disc.*n"
QUIT
ENDIF
ECHO "*nAll X-CAD 2000 files and icons copied onto hard disc."
ECHO "and all assigns made.*n"
QUIT